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Abstract. The multiplicity of early-type stars is still not well established. The 
derived binary fraction is different for individual star forming regions, suggesting 
a connection with the age and the environment conditions. The few studies that 
have investigated this connection do not provide conclusive results. To fill in this 
gap, we started the first detailed adaptive-optic-assisted imaging survey of early- 
type field stars to derive their multiplicity in a homogeneous way. The sample has 
been extracted from the Hipparcos Catalog and consists of 341 BA-type stars within 
~300pc from the Sun. We report the current status of the survey and describe a 
Monte-Carlo simulation that estimates the completeness of our companion detection. 
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1. Introduction 

The multiplicity of pre-main sequence (PMS) and main sequence (MS) 
late-type stars have been extensively studied: Duquennoy & Mayor 
(1991), Reipurth & Zinnecker (1993), Prosser et al. (1994), Brandner et 
al. (1996). PMS late-type stars in low-density clouds like Taurus show 
higher binary fractions than PMS late-type stars formed in massive 
and dense star forming regions (SFR) like Orion. This difference was 
explained with an environmental dependence of the binary fraction: 
low-mass stars born in dense SFRs show a higher probability of dy- 
namic interactions with more massive members, so that they are ejected 
resulting in a low binary fraction, as shown by Sterzik & Durisen (1995). 
On the other hand, stars in low-density SFRs undergo low rate of stellar 
encounters, resulting in a higher binary fraction. 

It is unclear if this result remains valid for early-type stars, mostly 
because of the difficult detection of faint companions near bright O- and 
B-type stars. The works of Petr et al. (1998), Preibisch et al. (1999) and 
Shatsky &: Tokovinin (2002) indicate that the binary fraction of early- 
type stars varies from one SFR to another but current statistical basis 
is still not solid enough. The age of the SFRs can also affect the binary 
statistics: older systems are expected to have undergone through more 
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dynamical interaction, reducing their binarity fraction in comparison 
with the younger ones, as point by Tokovinin et al. (1999). 

2. The Survey 

The cluster multiplicity studies can cover only a limited range of density 
and age. This prompted us to estimate the binarity fraction of a repre- 
sentative, volume-limited sample of early-type field stars. We designed 
a survey able to detect at ~10cr level an M4-type companion at the 
mean distance of our sample (~200 pc) down to 0.4 arcsec separation 
from 100 Myr old A-type primary. The companions around B-type stars 
will be younger (~10 Myr), brighter, and easier to detect. Last but not 
least, the physical nature of the candidate components is verified by 
their common proper motion. Our goal is to compare the properties 
such as incidence and mass ratio of the multiple stars in the field and 
in different star-forming regions. 

3. Sample Selection 

The sample stars were selected according to the following criteria: 

• Apparent color B— F< 0.2 mag - conservative criterion met by all 
unreddened BA stars, and a few contaminating later- type stars. The 
spectral types for all stars were verified to be BA. 

• The sample contains field stars only. Members of the OB-associations 
listed in de Zeeuw et al. (1999) were excluded. 

• Distance D<300pc from the Sun (HIPPARCOS). At D=300pc 
the telescope's diffraction limit of 0.07 arcsec corresponds to 21 A. U 
(Shatsky & Tokovinin (2002) probed separations 45-900 A.U). 

• Proper motions >27mas/yr allowing to confirm/reject physical 
companion candidates taking two epoch separated by 1-2 yr. 

• The apparent V=5-6 mag, so the targets are suitable self-references 
for NACO even under poor weather conditions. 

• The stars have DEC<0deg, i.e. visible from the VLT. 

The final sample contains 341 field B- and A-type stars. The average 
distance is 114pc, the median distance is 104 pc. 

4. Observations and Current Status 

The observations were carried out with NAOS-CONICA (Nasmyth 
Adaptive Optics System - Near-Infrared Imager and Spectrograph) at 
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the ESO VLT over the last two years. The pixel scale was 27.03 mas px , 
giving 27.7x27.7 arcsec field of view. Each target was observed at 9 
different position on the detector, collecting total of ~7.5min of in- 
tegration. The data reduction includes sky subtraction, flat-fielding, 
aligning and combination of the images into a single frame. Next, we 
perform PSF fitting/subtraction and search for faint companions. 

As of Sept 2005 we have observed 196 objects from our sample. 
We have analyzed 152 of them: 81 appear single, and 71 show com- 
panion candidates whose nature will be tested with the second epoch 
observations with >2yr baseline. 



5. Analysis: Modeling the Survey 

To estimate the sensitivity and the completeness of the survey we have 
created a Monte-Carlo simulation that takes into account all available 
information for the survey stars (Fig. 1). The model input parameters 
are: 

• the known distances, spectral types, absolute luminosities for all 
primaries; 

• adopted binarity fraction; 

• secondary star mass randomly sampled from the Kroupa et al. 
(1993) IMF; 

• secondary star's spectral type and absolute magnitude calculated 
from the mass; 

• orbital periods - randomly generated from Duquennoy & Mayor 
(1991) distribution; 

• major axis calculated from the Kepler's low and the period; 

• random ellipticity, random orbital inclination; 

• visibility criterion based on the magnitude difference and the 
angular separation between the primary and the companion. 

The model predicts: the distributions of periods, angular separa- 
tions, magnitude differences and spectral types for the detected bi- 
naries. The simulations indicate that we will detect about 2/3 of the 
physical companions. 
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Figure 1. Monte-Carlo simulation of the survey completeness: orbital period dis- 
tribution (top panel), orbital radii distribution (middle), and primary-secondary 
K-h&nd magnitude difference (bottom). The dot-dashed lines show the "true" 
adopted/generated distributions and the solid lines are the "observed" distributions 
after the observational detectability conditions have been applied. The theoretical 
period distribution of Duquennoy & Mayor (1991) is also shown (doted line on the 
top panel). 
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1. Implementation 

l \ProvidesFile{klu9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9.5, 9/11, 10/12, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{7, 

3 \9setf ontsize\normalsize\@ixpt{ll}'/, 

4 \abovedisplayskip 8.5\p@ \9plus3\pS \9minus4\p@ 

5 \abovedisplayshortskip \z@ \9plus2\p9 

6 \belowdisplayshortskip 4\p@ \9plus2\p9 \Sminus2\p9 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \9setf ontsize\small\0viiipt{9 . 5}°/, 

12 \abovedisplayskip 6\p@ \0plus2\pS \®miims4\p@ 

13 \abovedisplayshortskip \z(3 \9plus\p9 

14 \belowdisplayshortskip 3\p(S \(3plus\p9 \9miims2\p@ 

15 \def \(31isti{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \aplus\p(S \aminus\p@ 

17 \parsep 2\p3 \3plus\p® \aminus\pS 

18 \itemsep \parsep}'/, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{'/, 

22 \3setf ontsize\f ootnotesize\aviipt{8}'/ 

23 \abovedisplayskip 4\pa \aplus2\pa \aminus2\p3 

24 \abovedisplayshortskip \z3 \9plus\p9 

25 \belowdisplayshortskip 2\p<S \0plus\p® \9minusl\p9 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pO \9plus\p@ \<Sminus\pO 

28 \parsep l\p<3 \9plus\p@ \Sminus\pa 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\9setf ontsize\scriptsize\9vipt\9viipt} 

33 \newcommand\little{\Ssetf ontsize\little\@vpt\9vipt} 

34 \newcommand\tiny{\Ssetf ontsize\tiny\9vpt\9vipt} 

35 \newcommand\large{\9setf ontsize\large\@xpt\@xiipt} 

36 \newcommand\Large{\9setf ont size\Large\9xi ipt{ 14}} 

37 \newcommand\LARGE{\9setf ontsize\LARGE\9xivpt{18}} 

38 \newcommand\huge{\Ssetf ontsize\huge\9xviipt{22}} 

39 \newcommand\Huge{\Ssetf ontsize\Huge\9xxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\pS} 

43 \setlength\headheight{12\p9} 
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44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, WT^K. calculates 
textwidth out of \paperwidth. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}°/, 

58 \addtolength\atempdima{-\textwidth}7, 

59 \divide\@tempdima by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\3tempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}'/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \asettopoint\atempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\atempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\atempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \3tempdima 

88 \evensidemargin \@tempdima 
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These calculations are a lot easier, \textheight should have been set already. This does not 
check for the correct placement of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\(3tempdima{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima} 

94 \addtolength\atempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\atempdimb by -4pc 

98 \asettopoint\atempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\9tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\atempdima} 

106 \setlength\idaboxheight{\atempdima} 

107 \advance\id3boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p<3} 

110 \setlength{\skip\f ootins}{9\p(3 \@plus 4\p0 \0minus 2\p<3} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\p<3 \0plus l\p@ \0minus l\p<3} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\lef tmarginii}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmarginiv}{l . 4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{°/, 

122 \lef tmargin \leftmargini 

123 \topsep 8\p@ \0plus2\p0 \@minus2\p<§ 

124 \partopsep 2\p@ \<Splus l\p(3 \9minus l\p@ 

125 \itemsep 4\p(3 \9plus 2\p@ \9minus l\p@ 

126 \parsep 4\p@ \<Splus 2\p@ \<Sminus l\p0 } 

127 \def \01istii{'/, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(3plus 2\p(S \0minus l\p@ 

132 \parsep 2\p(S \<Splus l\p9 \<Sminus I\p0 

133 \itemsep \parsep} 
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134 \def \@listiii{°/, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \Oplus l\p<3 \<Sminus l\p@ 

139 \parsep \z3 

140 \partopsep l\p@ \Oplus 0\p3 \9minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istiv{'/, 

143 \setlength{\leftmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\lef tmargin}{\lef tmarginv}'/, 

148 \setlength{\labelwidth}{\lef tmarginv}'/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \<31istvi{'/, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\lef tmarginvi} 1 /. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\aiisti\01istl 

155 \31isti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f Ioatsep{l0\p3 \@plus 2\p<§ \@minus 2\p<8} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \Sminus 4\p<§} 

158 \setlength\intextsep{10\p@ \0plus 2\p@ \Sminus 2\p®} 

159 \setlength\dblf loatsep{10\p<3 \0plus 2\p® \@minus 2\p®} 

160 \setlength\dbltextf loatsep{18\p<3 \0plus 2\p@ \0minus 4\p<3} 

Separation on float pages 

161 \setlength\<3fptop{0\p<3 \<Splus If il} 

162 \setlength\<3fpsep{8\p<3 \@plus 2f il} 

163 \setlength\afpbot{0\p(3 \0plus If il} 

164 \setlength\<3dblfptop{0\p<3 \@plus If il} 

165 \setlength\(3dblfpsep{8\p<3 \@plus 2f il} 

166 \setlength\adblfpbot{0\pa \@plus lfil} 
167 

168 \endinput 
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1. Implementation 

l \ProvidesFile{klut9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{7, 

3 \3setf ontsize\normalsize\@ixpt{10 . 5}% 

4 \abovedisplayskip 8.5\p@ \9plus3\p@ \@minus4\p@ 

5 \abovedisplayshortskip \z9 \0plus2\p9 

6 \belowdisplayshortskip 4\p@ \9plus2\pa \Sminus2\p9 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \9setf ontsize\small\@viiipt{9}'/, 

12 \abovedisplayskip 6\p(S \@plus2\p@ \®miims4\p@ 

13 \abovedisplayshortskip \z(3 \9plus\p9 

14 \belowdisplayshortskip 3\p® \9plus\p9 \9miims2\p9 

15 \def \91isti{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \aplus\p(S \0minus\pS 

17 \parsep 2\p@ \(3plus\p<S \<Sminus\p(S 

18 \itemsep \parsep}'/, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{'/, 

22 \0setf ontsize\f ootnotesize\(Sviipt{8}'/ 

23 \abovedisplayskip 4\p@ \@plus2\p@ \9minus2\pS 

24 \abovedisplayshortskip \z(3 \9plus\p9 

25 \belowdisplayshortskip 2\p<S \0plus\p® \Ominusl\pa 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pO \9plus\p@ \<Sminus\pO 

28 \parsep l\p<3 \9plus\p@ \0minus\p0 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\(3setf ontsize\scriptsize\9vipt\(3viipt} 

33 \newcommand\little{\@setf ontsize\little\Svpt\9vipt} 

34 \newcommand\tiny{\(Ssetf ontsize\tiny\9vpt\avipt} 

35 \newcommand\large{\asetf ontsize\large\@xpt{ll .5}} 

36 \newcommand\Large{\asetf ont size\Large\@xi ipt{ 14}} 

37 \newcommand\LARGE{\asetf ontsize\LARGE\Sxivpt{18}} 

38 \newcommand\huge{\@setf ontsize\huge\8xviipt{22}} 

39 \newcommand\Huge{\Ssetf ontsize\Huge\axxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\pa} 
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44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, WT^K. calculates 
textwidth out of \paperwidth. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}°/, 

58 \addtolength\atempdima{-\textwidth}7, 

59 \divide\@tempdima by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\3tempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}'/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \asettopoint\atempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\atempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\atempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \3tempdima 

88 \evensidemargin \@tempdima 
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These calculations are a lot easier, \textheight should have been set already. This does not 
check for the correct placement of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\(3tempdima{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima} 

94 \addtolength\atempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\atempdimb by -4pc 

98 \asettopoint\atempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\9tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\atempdima} 

106 \setlength\idaboxheight{\atempdima} 

107 \advance\id3boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p<3} 

110 \setlength{\skip\f ootins}{9\p(3 \@plus 4\p0 \0minus 2\p<3} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\p<3 \0plus l\p@ \0minus l\p<3} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\lef tmarginii}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmarginiv}{l . 4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{°/, 

122 \lef tmargin \leftmargini 

123 \topsep 8\p@ \0plus2\p0 \@minus2\p<§ 

124 \partopsep 2\p@ \<Splus l\p(3 \9minus l\p@ 

125 \itemsep 4\p(3 \9plus 2\p@ \9minus l\p@ 

126 \parsep 4\p@ \<Splus 2\p@ \<Sminus l\p0 } 

127 \def \01istii{'/, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(3plus 2\p(S \0minus l\p@ 

132 \parsep 2\p(S \<Splus l\p9 \<Sminus I\p0 

133 \itemsep \parsep} 
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134 \def \@listiii{°/, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \Oplus l\p<3 \<Sminus l\p@ 

139 \parsep \z3 

140 \partopsep l\p@ \Oplus 0\p3 \9minus l\p@ 

141 \itemsep \topsep} 

142 \def \01istiv{'/, 

143 \setlength{\leftmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\lef tmargin}{\lef tmarginv}'/, 

148 \setlength{\labelwidth}{\lef tmarginv}'/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \<31istvi{'/, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\lef tmarginvi} 1 /. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\aiisti\01istl 

155 \31isti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f Ioatsep{l0\p3 \@plus 2\p<§ \@minus 2\p<8} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \Sminus 4\p<§} 

158 \setlength\intextsep{10\p@ \0plus 2\p@ \Sminus 2\p®} 

159 \setlength\dblf loatsep{10\p<3 \0plus 2\p® \@minus 2\p®} 

160 \setlength\dbltextf loatsep{18\p<3 \0plus 2\p@ \0minus 4\p<3} 

Separation on float pages 

161 \setlength\<3fptop{0\p<3 \<Splus If il} 

162 \setlength\<3fpsep{8\p<3 \@plus 2f il} 

163 \setlength\afpbot{0\p(3 \0plus If il} 

164 \setlength\<3dblfptop{0\p<3 \@plus If il} 

165 \setlength\(3dblfpsep{8\p<3 \@plus 2f il} 

166 \setlength\adblfpbot{0\pa \@plus lfil} 
167 

168 \endinput 



klulO.clo 



Kluwer Academic Publishers 



in 
o 
o 

(N 



X 



1998/02/11 

Abstract. This internal file takes care of list definitions and 'general' point size options. 

Table of Contents 



O ■ 1 Implementation 2 

1.1 Section size commands 2 

lO , 1.2 Various values 3 

1.3 Textheight and textwidth 3 

> ' 1.4 Lists 4 

' 1.5 Float separation parameters 5 



in 
o 



Oh: 

6 

CO 

C3 




© 2008 Kluwer Academic Publishers. Printed in the Netherlands. 



klul0.tex; 4/02/2008; 21:21; p.l 



2 

1. Implementation 

1 \ProvidesFile{klul0.clo}[\iiledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9.5, 9/11, 10/12, 12/14, 14/18, 17/22, 20/25, 25/30. 



2 \renewcommand\normalsize{°/, 

3 \@setf ontsize\normalsize\@xpt\@xiipt 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@mimis3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\01isti\QlistI} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \@setfontsize\small\(3ixpt{ll} 1 /, 

12 \abovedisplayskip 8.5\p@ \<3plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi-[\leftmargin\leftmargini 

16 \topsep 4\p@ \<3plus2\p@ \@minus2\p<3 

17 \parsep 2\p@ \@plus\p@ \@mimis\p@ 

18 \itemsep Xparsep}- 1 /, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/, 

22 \@setiontsize\footnotesize\@viiip"t{9 . 5}- '/, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@mimis2\p@ 

26 \def \@listi-[\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 Xparsep 2\p@ \@plus\p@ \@mimis\p@ 

29 \itemsep Xparsep} 1 /, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\ script size\@viipt\@viiipt} 

33 \newcommand\little{\@setf ontsize\little\@vipt\@viipt}- 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}-} 

37 \newcommand\LARGE{\@setfontsize\LARGE\(§xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25» 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 
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1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-l . 5cm} 

41 \setlength\vof f set{0pt} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\footskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\fboxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, I^TeX 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}°/, 

58 \addtolength\@tempdima{-\textwidth}y, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \f i 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }•/. 

86 \f i 

87 \oddsidemargin lin 

88 \evensidemargin lin 

These calculations are a lot easier, \textheight should have been set already. This does 

not check for the correct placement of the identification line!! 

89 \setlength\(3tempdima-[\paperheight}- 

90 \addtolength\@tempdima-[-\f ootskip}- 

91 \addtolength\@tempdima-[-\headheight} 

92 \addtolength\@tempdima-[-\headsep} 

93 \setlength\@tempdimb-[\@tempdima}- 

94 \addtolength\@tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \©settopoint\@tempdimb 

99 \GenericError-[Pointsize}-{Pointsize Error: Invalid sizes givenHHYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }•/. 

104 \fi 

105 \setlength\topmargin-[0pt}- 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@}- 

110 \setlength{\skip\footinsH9\p@ \@plus 4\p@ \®minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}-{2em]- 

113 \setlength{\lef tmarginii}-[2 . 2em} 
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114 \setlength{\lef tmarginiiiHl . 87em} 

115 \setlength{\leftmarginiv}-[l . 7em} 

116 \setlength{\leftmarginv}{lem} 

117 \setlength{\leftmarginviHlem} 

118 \setlength{\labelsepH.4em} 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidthH-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def \@listl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{°/„ 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii-(7. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{'/„ 

143 \setlength-[\lef tmargin}-{\lef tmarginiv}/, 

144 \setlength-[\labelwidth}{\lef tmarginiv}/, 

145 \addtolength-[\labelwidth}{-\labelsep}} 

146 \def \01istv{'/. 

147 \setlength-[\lef tmargin}{\lef tmarginv}'/, 

148 \setlength-[\labelwidth}{\lef tmarginv}'/, 

149 \addtolength-[\labelwidth}{-\labelsep}} 

150 \def \@listvi{°/, 

151 \setlength-[\leitmargin}{\lef tmarginvi}/, 

152 \setlength-[\labelwidth}{\lef tmarginvi}/, 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 

155 \@listi 

1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\floatsep{12\p@ \@plus 2\p@ \@mimis 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \<§minus 2\p@} 

160 \setlength\dbltextf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il} 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot.{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl0.clo}[\iiledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 12/14, 14/18, 17/22, 20/25, 25/30. 



2 \renewcoiranand\normalsize{°/, 

3 \@setf ontsize\normalsize\@xpt{ll . 5}-°/, 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@mimis3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\01isti\QlistI} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \@setf ontsize\small\@ixpt{ 10 . 5}°/. 

12 \abovedisplayskip 8.5\p@ \<3plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi-[\leftmargin\leftmargini 

16 \topsep 4\p@ \<3plus2\p@ \@minus2\p<3 

17 \parsep 2\p@ \@plus\p@ \@mimis\p@ 

18 \itemsep Xparsep}- 1 /, 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootriotesize{°/, 

22 \@setfontsize\f ootnotesize\@viiipt{9}°/ t 

23 \abovedisplayskip 6\p@ \@plus2\p@ \<3minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@mimis2\p@ 

26 \def \@listi-[\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 Xparsep 2\p@ \@plus\p@ \@mimis\p@ 

29 \itemsep Xparsep} 1 /, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\ script size\@viipt\@viiipt} 

33 \newcommand\little{\@setf ontsize\little\@vipt\@viipt}- 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt> 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}-} 

37 \newcommand\LARGE{\@setfontsize\LARGE\(§xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25» 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 
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1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\footskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\fboxsep{3pt} 

54 \setlength\fboxrule{.4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, I^TeX 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}°/, 

58 \addtolength\@tempdima{-\textwidth}y, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \f i 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }•/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 

These calculations are a lot easier, \textheight should have been set already. This does 

not check for the correct placement of the identification line!! 

89 \setlength\(3tempdima-[\paperheight}- 

90 \addtolength\@tempdima-[-\f ootskip}- 

91 \addtolength\@tempdima-[-\headheight} 

92 \addtolength\@tempdima-[-\headsep} 

93 \setlength\@tempdimb-[\@tempdima}- 

94 \addtolength\@tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \©settopoint\@tempdimb 

99 \GenericError-[Pointsize}-{Pointsize Error: Invalid sizes givenHHYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }•/. 

104 \fi 

105 \setlength\topmargin-[\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@}- 

110 \setlength{\skip\footins}{9\p@ \@plus 4\p@ \®minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}-{2em]- 

113 \setlength{\lef tmarginii}-[2 . 2em} 
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114 \setlength{\lef tmarginiiiHl . 87em} 

115 \setlength{\lef tmarginivHl . 7em} 

116 \setlength{\lef tmarginvHlem} 

117 \setlength{\leftmarginviHlem} 

118 \setlength{\labelsepH.4em} 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidth}-[-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def \@listl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@mimis 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \Qlistii{'/. 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii-(7. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{'/„ 

143 \setlength-[\lef tmargin}{\lef tmarginiv} 1 /, 

144 \setlength-[\labelwidth}-{\lef tmarginiv} 1 /, 

145 \addtolength-[\labelwidth}{-\labelsep}} 

146 \def \@listv{7. 

147 \setlength-[\lef tmargin}{\lef tmarginv}'/, 

148 \setlength-[\labelwidth}{\lef tmarginv}'/, 

149 \addtolength-[\labelwidth}{-\labelsep}} 

150 \def \aiistvi-C7. 

151 \setlength-[\leitmargin}{\lef tmarginvi}'/, 

152 \setlength-[\labelwidth}{\lef tmarginvi} 1 /, 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 

155 \@listi 

1.5. Float separation parameters 
Separation on text pages. 



klutl0.tex; 4/02/2008; 21:21; p. 5 



G 



Kluwcr Academic Publishers 



156 \setlength\floatsep-[12\p@ \@plus 2\p@ \@mimis 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

160 \setlength\dbltextfloatsep{20\p@ \Splus 2\p@ \Qminus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il> 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p(§ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutll.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/12.5, 12/14, 14/18, 17/22, 
20/25, 25/30. 



2 \renewcommand\noriiialsize{7o 

3 \@setf ontsize\normalsize\@xipt{12 . 5}% 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@miims3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \(§setf ontsize\small\@xpt{ll .5}% 

12 \abovedisplayskip 9\p@ \@plus3\p@ \0minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 5\p@ \0plus2\p@ \0minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \0plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{ /, 

22 \@setf ontsize\f ootnotesize\@ixpt{10 . 5}7, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \0minus4\p@ 

24 \abovedisplayshortskip \z(§ \@plus\p@ 

25 \belowdisplayshortskip 3\p(§ \(§plus\p(§ \@minus2\p@ 

26 \def \(§listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viipt\@viiipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25» 
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39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof fset{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p(S} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt> 

53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ .4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
I^TeX calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}7 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}y. 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Margin/pars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 Yh 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }% 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\p@ \@minus 2\p@> 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{2em} 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength{\lef tmarginiv}{l . 7em} 

116 \setlength-C\lef tmarginvMlem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{ .4em} 

119 \setlength{\labelwidthM\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \01istI{°/„ 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \it emsep 4.5\p@ \@plus 2\p@ \0minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\pQ > 

127 \def \<31istii{°/„ 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(§plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \(§minus l\p@ 

133 \itemsep \parsep} 

134 \def \<31istiii{°/„ 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \0minus l\p(S 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \Qlistiv{°/„ 

143 \setlength{\lef tmargin}{\lef tmarginiv}7o 

144 \setlength{\labelwidth}{\lef tmarginiv}"/, 

145 \addtolength{\labelwidth}{-\labelsep» 

146 \def \@listv{°/„ 
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147 \setlength{\lef tmargin}{\lef tmarginv}°/ 

148 \setlength{\labelwidth}{\lef tmarginv} / 

149 \addtolength{\labelwidth}{-\labelsep» 

150 \def \01istvi{ /, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\leftmarginvi}°/ 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

157 \setlength\textf loatsep{20\p@ \<§plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \Qminus 2\p@} 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \@minus 2\p(S} 

160 \setlength\dbltextf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il} 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl2.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 8/9, 9/10.5, 10/11.5, 11/12.5 12/13.5, 14/18, 17/22, 20/25, 
25/30. 

2 \renewcommand\normalsize{% 



3 \@setf ontsize\normalsize\@xiipt-[13 . 5}% 

4 \abovedisplayskip ll\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip l\p@ \@plus 3\p@ 

6 \belowdisplayshortskip 7\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommand\small{7o 

11 \@setf ontsize\small\@xipt{12 . 5>% 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}°/„ 

19 \belowdisplayskip \abovedisplayskip 

20 > 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@xpt{ll .5}% 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def\@listi{\leftmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}°/ 

30 \belowdisplayskip \abovedisplayskip 
31} 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@ixpt{10 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viiipt{9}} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt> 
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35 \newcommand\large{\@setf ontsize\large\@xivpt{18}} 

36 \newcommand\Large{\@setf ontsize\Large\@xviipt{22}} 

37 \newcommand\LARGE{\@setfontsize\LARGE\@xxpt{25» 

38 \newcommand\huge{\@setf ontsize\huge\@xxvpt{30}} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calcula- 
tions below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin} 

42 \setlength\parindent {14\p@} 
43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\f ootskip {27 . 5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{12pt> 

52 \setlength\columnseprule{Opt} 
53 \setlength\fboxsep{3pt} 
54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight AND TEXTWIDTH 

These are the main reason for the existence of these files. For some stupid reason, 
ETfTX. calculates textwidth out of \paperwidth. We did want to support letter paper, 
but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{% 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}°/„ 



klutl2.tex; 4/02/2008; 21:21; p. 3 



4 



59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \ addt o 1 engt h\ @t empd imb { 2p c } % 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }% 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }% 

86 \fi 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. This 
does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \ addt olength\@tempdima{-\foot skip} 

91 \ addt o 1 engt h\ @t empdima{-\he adhe i ght } 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 
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99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }'/. 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{12\p@ \@plus 4\p@ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{2em} 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiiiMl . 87em} 

115 \setlength{\lef tmarginivMl . 7em} 

116 \setlength{\lef tmarginvMlem} 
117 \setlength{\lef tmarginviMlem} 

118 \setlength{\labelsep}{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def \@listl{% 

122 \leftmargin \leftmargini 

123 \topsep ll\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 4.5\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 6\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 6\p@ \@plus 2\p@ \@minus l\p<§ } 

127 \def \@listii{°/„ 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 6\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 3\p@ \@plus l\p<§ \@minus l\p@ 
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133 \itemsep \parsep} 

134 \def \@listiii{°/„ 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{°/ 

143 \setlength{\lef tmargin}{\lef tmarginiv}% 

144 \setlength{\labelwidthH\leftmarginiv}% 

145 \addtolength{\labelwidth>{-\labelsep}> 

146 \def \@listv{% 

147 \setlength{\lef tmargin}{\lef tmarginv}% 

148 \setlength{\labelwidth}{\lef tmarginv}% 

149 \addtolength{\labelwidth>{-\labelsep}> 

150 \def \@listvi{y„ 

151 \setlength{\lef tmargin}{\lef tmarginvi}% 

152 \setlength{\labelwidthH\leftmarginvi}% 

153 \addtolength{\labelwidth>{-\labelsep}> 
154 \let\@listi\@listl 

155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\floatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

157 \setlength\textf loatsep{24\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

160 \setlength\dbltextfloatsep{24\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il} 

162 \setlength\@fpsep{10\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{10\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klul05.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 9/11, 10/11.5, 10.5/12, 11/13, 12/14, 14/18, 17/22, 
20/25, 25/30. 



2 \renewcommand\noriiialsize{7o 

3 \@setf ontsize\normalsize{10 . 5pt}{12}% 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@miims3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommand\small{°/, 

11 \@setf ontsize\small\@xpt{ll .5}% 

12 \abovedisplayskip 9\p@ \@plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 5\p@ \0plus2\p@ \0minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \0plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{ /, 

22 \@setf ontsize\f ootnotesize\@ixpt\@xipt 

23 \abovedisplayskip 6\p@ \0plus2\p0 \0minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p(§ \(§plus\p(§ \@minus2\p(§ 

26 \def \@listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p® \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viipt\@viiipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt> 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 
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39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof fset{-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {13\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p(S} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt> 

53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ .4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
I^TeX calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/, 

57 \setlength\@tempdima{\paperwidth}7 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}y. 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Margin/pars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 Yh 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }% 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\p@ \@minus 2\p@> 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{2em} 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength{\lef tmarginiv}{l . 7em} 

116 \setlength-C\lef tmarginvMlem} 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}{ .4em} 

119 \setlength{\labelwidthM\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \01istI{°/„ 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \it emsep 4.5\p@ \@plus 2\p@ \0minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\pQ > 

127 \def \<31istii{°/„ 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(§plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \(§minus l\p@ 

133 \itemsep \parsep} 

134 \def \<31istiii{°/„ 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \0minus l\p(S 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \Qlistiv{°/„ 

143 \setlength{\lef tmargin}{\lef tmarginiv}7o 

144 \setlength{\labelwidth}{\lef tmarginiv}"/, 

145 \addtolength{\labelwidth}{-\labelsep» 

146 \def \@listv{°/„ 
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147 \setlength{\lef tmargin}{\lef tmarginv}°/ 

148 \setlength{\labelwidth}{\lef tmarginv} / 

149 \addtolength{\labelwidth}{-\labelsep» 

150 \def \01istvi{ /, 

151 \setlength{\lef tmargin}{\lef tmarginvi}"/, 

152 \setlength{\labelwidth}{\leftmarginvi}°/ 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

157 \setlength\textf loatsep{20\p@ \<§plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \Qminus 2\p@} 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \@minus 2\p(S} 

160 \setlength\dbltextf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il} 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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